Teach Your Children: Road Construction Ahead/Teach Your Children: Road Construction Ahead.iso/pc/rca/road.dxr/00036_ObjectGroup Class.ls

Text File | 1996-07-17 | 266 b | 19 lines

property objectList

on birth me, listOfObjects
  set objectList to listOfObjects
  return me
end

on update me
  repeat with object in objectList
    update(object)
  end repeat
end

on reset me
  repeat with object in objectList
    reset(object)
  end repeat
end